home *** CD-ROM | disk | FTP | other *** search
/ BBS in a Box 15 / BBS in a box XV-2.iso / Files II / Updates / General / Frontier 3.0 to 3.0.3 Upg.sit / 3.0 => 3.0.3 Upgrader / Upgrade Files / Verb Upgrades / dialog.loadFromFile.rsrc / data_28672_system.verbs.builtins.dialog.loadFromFile next >
Unknown  |  1994-03-09  |  1.9 KB
open in: MacOS 8.1     |     Win98     |     DOS

view JSON data     |     view as text


This file was not able to be converted.
This format is not currently supported by dexvert.

ConfidenceProgramDetectionMatch TypeSupport
100% file data default


hex view
+--------+-------------------------+-------------------------+--------+--------+
|00000000| 73 63 70 74 00 01 04 f6 | 00 02 00 00 01 0e 00 00 |scpt....|........|
|00000010| 06 39 00 00 02 00 00 0f | 06 47 65 6e 65 76 61 00 |.9......|.Geneva.|
|00000020| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000030| 00 00 00 00 00 00 00 00 | 00 00 00 09 00 00 00 00 |........|........|
|00000040| 00 00 00 00 00 00 06 54 | 00 00 a6 57 82 ef a9 6b |.......T|...W...k|
|00000050| ef af 00 00 00 12 00 00 | 00 3c 00 46 01 ef 01 ee |........|.<.F....|
|00000060| 4c 41 4e 44 00 00 00 00 | 00 00 00 00 00 00 00 00 |LAND....|........|
|00000070| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000080| 6f 6e 20 6c 6f 61 64 46 | 72 6f 6d 46 69 6c 65 20 |on loadF|romFile |
|00000090| 28 70 61 74 68 29 0d 09 | 6c 6f 61 64 73 20 74 68 |(path)..|loads th|
|000000a0| 65 20 44 4c 4f 47 2f 44 | 49 54 4c 20 72 65 73 6f |e DLOG/D|ITL reso|
|000000b0| 75 72 63 65 73 20 66 72 | 6f 6d 20 61 20 66 69 6c |urces fr|om a fil|
|000000c0| 65 0d 09 09 66 69 72 73 | 74 20 77 65 20 74 72 79 |e...firs|t we try|
|000000d0| 20 74 6f 20 75 73 65 20 | 74 68 65 20 70 61 74 68 | to use |the path|
|000000e0| 20 61 73 20 61 20 66 69 | 6c 65 20 70 61 74 68 0d | as a fi|le path.|
|000000f0| 09 09 09 69 66 20 74 68 | 61 74 20 66 61 69 6c 73 |...if th|at fails|
|00000100| 2c 20 77 65 20 6c 6f 6f | 6b 20 69 6e 20 74 68 65 |, we loo|k in the|
|00000110| 20 44 69 61 6c 6f 67 73 | 20 66 6f 6c 64 65 72 0d | Dialogs| folder.|
|00000120| 09 09 74 68 65 6e 20 77 | 65 20 6c 6f 61 64 20 69 |..then w|e load i|
|00000130| 6e 20 66 69 72 73 74 20 | 44 4c 4f 47 2f 44 49 54 |n first |DLOG/DIT|
|00000140| 4c 20 77 68 6f 73 65 20 | 69 64 20 69 73 20 32 35 |L whose |id is 25|
|00000150| 30 30 30 20 6f 72 20 67 | 72 65 61 74 65 72 0d 09 |000 or g|reater..|
|00000160| 09 09 74 68 69 73 20 49 | 44 20 77 61 73 20 63 68 |..this I|D was ch|
|00000170| 6f 73 65 6e 20 61 74 20 | 72 61 6e 64 6f 6d 2c 20 |osen at |random, |
|00000180| 62 79 20 63 6f 6e 76 65 | 6e 74 69 6f 6e 20 61 6c |by conve|ntion al|
|00000190| 6c 20 73 75 63 68 20 66 | 69 6c 65 73 20 75 73 65 |l such f|iles use|
|000001a0| 20 74 68 69 73 20 6e 75 | 6d 62 65 72 0d 09 09 77 | this nu|mber...w|
|000001b0| 65 20 61 6c 73 6f 20 6c | 6f 61 64 20 69 6e 20 61 |e also l|oad in a|
|000001c0| 6c 6c 20 6f 74 68 65 72 | 20 72 65 73 6f 75 72 63 |ll other| resourc|
|000001d0| 65 73 20 77 68 6f 73 65 | 20 49 44 20 69 73 20 32 |es whose| ID is 2|
|000001e0| 35 30 30 30 20 6f 72 20 | 67 72 65 61 74 65 72 0d |5000 or |greater.|
|000001f0| 09 09 09 74 68 69 73 20 | 61 6c 6c 6f 77 73 20 66 |...this |allows f|
|00000200| 6f 72 20 63 75 73 74 6f | 6d 20 63 6f 6e 74 72 6f |or custo|m contro|
|00000210| 6c 73 2c 20 70 69 63 74 | 75 72 65 73 2c 20 65 74 |ls, pict|ures, et|
|00000220| 63 2e 0d 09 09 74 68 65 | 6e 20 77 65 20 61 73 73 |c....the|n we ass|
|00000230| 69 67 6e 20 74 68 65 20 | 6e 65 77 20 44 4c 4f 47 |ign the |new DLOG|
|00000240| 20 61 6e 20 49 44 0d 09 | 09 09 69 74 27 73 20 74 | an ID..|..it's t|
|00000250| 68 65 20 49 44 20 6f 66 | 20 74 68 65 20 44 4c 4f |he ID of| the DLO|
|00000260| 47 20 77 65 20 6c 6f 61 | 64 65 64 20 66 72 6f 6d |G we loa|ded from|
|00000270| 20 74 68 65 20 6f 72 69 | 67 69 6e 61 6c 20 66 69 | the ori|ginal fi|
|00000280| 6c 65 0d 09 09 09 69 66 | 20 70 65 72 66 6f 72 6d |le....if| perform|
|00000290| 61 6e 63 65 20 77 61 72 | 72 61 6e 74 2c 20 77 65 |ance war|rant, we|
|000002a0| 27 6c 6c 20 63 6f 6d 65 | 20 75 70 20 77 69 74 68 |'ll come| up with|
|000002b0| 20 61 20 77 61 79 20 74 | 6f 20 61 6c 6c 6f 63 61 | a way t|o alloca|
|000002c0| 74 65 20 74 68 65 73 65 | 0d 09 09 09 73 6f 20 79 |te these|....so y|
|000002d0| 6f 75 20 64 6f 6e 27 74 | 20 68 61 76 65 20 74 6f |ou don't| have to|
|000002e0| 20 6c 6f 61 64 20 79 6f | 75 72 20 72 65 73 6f 75 | load yo|ur resou|
|000002f0| 72 63 65 73 20 65 76 65 | 72 79 20 74 69 6d 65 20 |rces eve|ry time |
|00000300| 79 6f 75 72 20 73 63 72 | 69 70 74 20 72 75 6e 73 |your scr|ipt runs|
|00000310| 0d 09 0d 09 69 66 20 6e | 6f 74 20 66 69 6c 65 2e |....if n|ot file.|
|00000320| 65 78 69 73 74 73 20 28 | 70 61 74 68 29 0d 09 09 |exists (|path)...|
|00000330| 70 61 74 68 20 3d 20 46 | 72 6f 6e 74 69 65 72 2e |path = F|rontier.|
|00000340| 70 61 74 68 73 74 72 69 | 6e 67 20 2b 20 22 44 69 |pathstri|ng + "Di|
|00000350| 61 6c 6f 67 73 3a 22 20 | 2b 20 70 61 74 68 0d 09 |alogs:" |+ path..|
|00000360| 09 69 66 20 6e 6f 74 20 | 66 69 6c 65 2e 65 78 69 |.if not |file.exi|
|00000370| 73 74 73 20 28 70 61 74 | 68 29 0d 09 09 09 73 63 |sts (pat|h)....sc|
|00000380| 72 69 70 74 45 72 72 6f | 72 20 28 22 43 61 6e 27 |riptErro|r ("Can'|
|00000390| 74 20 6c 6f 63 61 74 65 | 20 74 68 65 20 22 20 2b |t locate| the " +|
|000003a0| 20 70 61 74 68 20 2b 20 | 22 20 64 69 61 6c 6f 67 | path + |" dialog|
|000003b0| 20 66 69 6c 65 2e 22 29 | 0d 09 0d 09 6c 6f 63 61 | file.")|....loca|
|000003c0| 6c 20 28 72 6f 6f 74 70 | 61 74 68 20 3d 20 46 72 |l (rootp|ath = Fr|
|000003d0| 6f 6e 74 69 65 72 2e 67 | 65 74 46 69 6c 65 50 61 |ontier.g|etFilePa|
|000003e0| 74 68 20 28 29 29 0d 09 | 6c 6f 63 61 6c 20 28 67 |th ())..|local (g|
|000003f0| 6f 74 44 4c 4f 47 20 3d | 20 66 61 6c 73 65 2c 20 |otDLOG =| false, |
|00000400| 67 6f 74 44 49 54 4c 20 | 3d 20 66 61 6c 73 65 29 |gotDITL |= false)|
|00000410| 0d 09 6c 6f 63 61 6c 20 | 28 64 6c 6f 67 49 44 20 |..local |(dlogID |
|00000420| 3d 20 32 35 30 30 30 29 | 0d 09 6c 6f 63 61 6c 20 |= 25000)|..local |
|00000430| 28 69 78 74 79 70 65 2c | 20 69 78 72 73 72 63 29 |(ixtype,| ixrsrc)|
|00000440| 0d 09 6c 6f 63 61 6c 20 | 28 72 65 73 74 79 70 65 |..local |(restype|
|00000450| 2c 20 69 64 2c 20 6e 61 | 6d 65 2c 20 78 29 0d 09 |, id, na|me, x)..|
|00000460| 0d 09 66 6f 72 20 69 78 | 74 79 70 65 20 3d 20 31 |..for ix|type = 1|
|00000470| 20 74 6f 20 72 65 7a 2e | 63 6f 75 6e 74 52 65 73 | to rez.|countRes|
|00000480| 54 79 70 65 73 20 28 70 | 61 74 68 29 0d 09 09 72 |Types (p|ath)...r|
|00000490| 65 7a 2e 67 65 74 4e 74 | 68 52 65 73 54 79 70 65 |ez.getNt|hResType|
|000004a0| 20 28 70 61 74 68 2c 20 | 69 78 74 79 70 65 2c 20 | (path, |ixtype, |
|000004b0| 40 72 65 73 74 79 70 65 | 29 0d 09 09 66 6f 72 20 |@restype|)...for |
|000004c0| 69 78 72 73 72 63 20 3d | 20 31 20 74 6f 20 72 65 |ixrsrc =| 1 to re|
|000004d0| 7a 2e 63 6f 75 6e 74 52 | 65 73 6f 75 72 63 65 73 |z.countR|esources|
|000004e0| 20 28 70 61 74 68 2c 20 | 72 65 73 74 79 70 65 29 | (path, |restype)|
|000004f0| 0d 09 09 09 72 65 7a 2e | 67 65 74 4e 74 68 52 65 |....rez.|getNthRe|
|00000500| 73 49 6e 66 6f 20 28 70 | 61 74 68 2c 20 72 65 73 |sInfo (p|ath, res|
|00000510| 74 79 70 65 2c 20 69 78 | 72 73 72 63 2c 20 40 69 |type, ix|rsrc, @i|
|00000520| 64 2c 20 40 6e 61 6d 65 | 29 0d 09 09 09 69 66 20 |d, @name|)....if |
|00000530| 69 64 20 3e 3d 20 32 35 | 30 30 30 0d 09 09 09 09 |id >= 25|000.....|
|00000540| 63 61 73 65 20 72 65 73 | 74 79 70 65 0d 09 09 09 |case res|type....|
|00000550| 09 09 27 44 4c 4f 47 27 | 0d 09 09 09 09 09 09 69 |..'DLOG'|.......i|
|00000560| 66 20 67 6f 74 44 4c 4f | 47 0d 09 09 09 09 09 09 |f gotDLO|G.......|
|00000570| 09 63 6f 6e 74 69 6e 75 | 65 0d 09 09 09 09 09 09 |.continu|e.......|
|00000580| 67 6f 74 44 4c 4f 47 20 | 3d 20 74 72 75 65 0d 09 |gotDLOG |= true..|
|00000590| 09 09 09 09 09 64 6c 6f | 67 49 44 20 3d 20 69 64 |.....dlo|gID = id|
|000005a0| 0d 09 09 09 09 09 27 44 | 49 54 4c 27 0d 09 09 09 |......'D|ITL'....|
|000005b0| 09 09 09 69 66 20 67 6f | 74 44 49 54 4c 0d 09 09 |...if go|tDITL...|
|000005c0| 09 09 09 09 09 63 6f 6e | 74 69 6e 75 65 0d 09 09 |.....con|tinue...|
|000005d0| 09 09 09 09 67 6f 74 44 | 49 54 4c 20 3d 20 74 72 |....gotD|ITL = tr|
|000005e0| 75 65 0d 09 09 09 09 69 | 66 20 72 65 7a 2e 67 65 |ue.....i|f rez.ge|
|000005f0| 74 52 65 73 6f 75 72 63 | 65 20 28 70 61 74 68 2c |tResourc|e (path,|
|00000600| 20 72 65 73 74 79 70 65 | 2c 20 69 64 2c 20 40 78 | restype|, id, @x|
|00000610| 29 0d 09 09 09 09 09 72 | 65 7a 2e 70 75 74 52 65 |)......r|ez.putRe|
|00000620| 73 6f 75 72 63 65 20 28 | 72 6f 6f 74 70 61 74 68 |source (|rootpath|
|00000630| 2c 20 72 65 73 74 79 70 | 65 2c 20 69 64 2c 20 40 |, restyp|e, id, @|
|00000640| 78 29 0d 09 69 66 20 6e | 6f 74 20 28 67 6f 74 44 |x)..if n|ot (gotD|
|00000650| 4c 4f 47 20 61 6e 64 20 | 67 6f 74 44 49 54 4c 29 |LOG and |gotDITL)|
|00000660| 0d 09 09 73 63 72 69 70 | 74 45 72 72 6f 72 20 28 |...scrip|tError (|
|00000670| 22 43 61 6e 27 74 20 6c | 6f 63 61 74 65 20 74 68 |"Can't l|ocate th|
|00000680| 65 20 64 69 61 6c 6f 67 | 20 72 65 73 6f 75 72 63 |e dialog| resourc|
|00000690| 65 73 20 69 6e 20 22 20 | 2b 20 70 61 74 68 20 2b |es in " |+ path +|
|000006a0| 20 22 2e 22 29 0d 09 0d | 09 72 65 74 75 72 6e 20 | ".")...|.return |
|000006b0| 28 64 6c 6f 67 49 44 29 | 0d 80 00 00 00 00 00 84 |(dlogID)|........|
|000006c0| 00 00 00 00 00 80 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000006d0| 00 80 00 00 00 00 00 00 | 00 00 00 00 00 80 00 00 |........|........|
|000006e0| 00 00 00 00 00 00 00 00 | 00 80 00 00 00 00 00 00 |........|........|
|000006f0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000700| 00 80 00 00 00 00 00 80 | 00 00 00 00 00 80 00 00 |........|........|
|00000710| 00 00 00 80 00 00 00 00 | 00 80 00 00 00 00 00 80 |........|........|
|00000720| 00 00 00 00 00 80 00 00 | 00 00 00 80 00 00 00 00 |........|........|
|00000730| 00 80 00 00 00 00 00 80 | 00 00 00 00 00 80 00 00 |........|........|
|00000740| 00 00 00 80 00 00 00 00 | 00 80 00 00 00 00 00 80 |........|........|
|00000750| 00 00 00 00 00 80 00 00 | 00 00 00 80 00 00 00 00 |........|........|
|00000760| 00 80 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000770| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000780| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000790| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000007a0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 80 |........|........|
|000007b0| 00 00 00 00 00 00 00 00 | 00 00 00 80 00 00 00 00 |........|........|
|000007c0| 00 80 00 00 00 00 00    |                         |....... |        |
+--------+-------------------------+-------------------------+--------+--------+